﻿Public Class WebForm1
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Public Function getStars(ByVal stars As Integer)
        Dim retval As String
        retval = ""
        For i = 1 To stars
            retval = retval + "*"
        Next
        Return retval
    End Function

End Class